<?php
/* 
 * ********* CVS HEADER ********* 
 * 
 * $RCSfile: htmlnav.php,v $ 
 * $Date: 2005/08/29 15:33:17 $ 
 * $Revision: 1.2 $ 
 * 
 * ********* CVS HEADER ********* 
 */
if((!isset($r))||$r<=0)
   $r=1;
if(isset($code)){
	if($code[strlen($code)-1]=='/'){
		$query="SELECT id FROM html_repertoire WHERE path='$code'";
		$result=rportalrequete($query) or rportalerreur("ERREUR : $query","?op=");
		if(rportalnbresult($result)==1){
			$row=rportalligne($result);
			$r = $row['id'];
		}else{
			// Bug #21:probleme fonction html quand un repertoire n'existe pas
			header('Location: ?op=html');	
			exit;
		}
	}
}
// on recupere les donnees du repertoire courant.
$query ="SELECT html_repertoire.* FROM html_repertoire,hierarchie WHERE id='$r'";
$query.=" AND html_repertoire.droit=hierarchie.id_groupe";
$query.=" AND hierarchie.id_groupe_dessus='".$session['id_groupe']."'";
$result=rportalrequete($query) or rportalerreur("ERREUR : $query","?op=");
if(rportalnbresult($result)==0){
	if($r!=1)
		header('Location: ?op=htmlnav&r=1');
	else
		header('Location: ?op=');
	exit;
}
$repertoire=rportalligne($result);
/**
 * les variables $html_... peuvent etre utilisees dans les header et footer
 */
$html_compteur='';
$html_titre="Listing du repertoire : ".$repertoire['nom'];
$html_description="Listing du repertoire : ".$repertoire['nom'];
$html_path=$repertoire['path'].'index';
$html_repertoire_id = $r;

require_once("module/TPLN/TPLN.php"); 
$TPLN = new TPLN; 
$TPLN->Open($op_basepath."tpl/htmlnav.html"); 
$TPLN->IncludeFile("header","environnement/".$session['environnement']."/header.php"); 
$TPLN->IncludeFile("footer","environnement/".$session['environnement']."/footer.php");
$TPLN->Parse("path",$repertoire['path']);
if($repertoire['id_parent']>0)
	$TPLN->Parse("parent.id_parent",$repertoire['id_parent']);
else
	$TPLN->EraseBloc("parent");
//on affiche les repertoires du repertoire courant
$query="SELECT html_repertoire.*,groupe.nom AS droit_nom FROM html_repertoire,hierarchie,groupe WHERE groupe.id=html_repertoire.droit AND hierarchie.id_groupe=html_repertoire.droit AND hierarchie.id_groupe_dessus='$session[id_groupe]' AND id_parent='$r' AND html_repertoire.id!='$r' ORDER BY html_repertoire.nom ASC";
$result=rportalrequete($query) or rportalerreur("ERREUR : $query","?op=");
if(rportalnbresult($result)==0){
	$TPLN->EraseBloc("repertoire");
}else{
	while($row=rportalligne($result)){
		$TPLN->Parse("repertoire.id",$row['id']);
		$TPLN->Parse("repertoire.nom",$row['nom']);	
		$TPLN->Loop("repertoire");
	}
}
//on affiche les pages html du repertoire courant
$query ="SELECT html.*,groupe.nom AS droit_nom , html_type.image As type_image";
$query.=" FROM html,hierarchie,groupe,html_type";
$query.=" WHERE groupe.id=html.droit";
$query.=" AND hierarchie.id_groupe=html.droit";
$query.=" AND hierarchie.id_groupe_dessus='$session[id_groupe]'";
$query.=" AND html.id_repertoire='$r'";
$query.=" AND html.type=html_type.id";
$query.=" AND html.publier='1'";
$query.=" ORDER BY html.nom ASC";
$result=rportalrequete($query) or rportalerreur("ERREUR : $query","?op=");
if(rportalnbresult($result)==0){
	$TPLN->EraseBloc("fichier");
}else{
	while($row=rportalligne($result)){
		$description="\nTitre: ".$row['titre']."\nNUMERO PAGE=".$row['id']."\nURL: ?op=html&code=".$row['code']."\nvu ".$row['compteur']." fois";
		$description.="\nModifie le ".$row['modification'];
		$TPLN->Parse("fichier.code",$row['code']);
		$TPLN->Parse("fichier.nom",$row['titre']);
		$TPLN->Parse("fichier.description",$description);
		$TPLN->Parse("fichier.type_image",$row['type_image']);
		$TPLN->Loop("fichier");
	}
}
$TPLN->Write();
?>